﻿Public Class _Default
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

    End Sub

    Protected Sub Btn_sum_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Btn_sum.Click
        Dim n1 As Single
        Dim n2 As Single
        n1 = CSng(TB_num1.Text)
        n2 = CSng(TB_num2.Text)

        Dim Sumf As Single
        Sumf = n1 + n2
        lbl_total.Text = "total is" & Sumf

    End Sub
End Class